projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
a6e6e71
)
Delete debugging lines from previous change.
author
Richard M. Stallman
<rms@gnu.org>
Tue, 12 Jul 1994 22:32:58 +0000
(22:32 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Tue, 12 Jul 1994 22:32:58 +0000
(22:32 +0000)
lisp/mouse-sel.el
patch
|
blob
|
history
diff --git
a/lisp/mouse-sel.el
b/lisp/mouse-sel.el
index 112f72856637be121fbdb2f5f54a1e55be233d3d..092e1cae6b8e6f958c69314664f94133816c5ec5 100644
(file)
--- a/
lisp/mouse-sel.el
+++ b/
lisp/mouse-sel.el
@@
-248,7
+248,6
@@
This should be bound to a down-mouse event."
(setq mouse-sel-selection-type
(mouse-sel-determine-selection-type (event-click-count EVENT)))
(let ((object-bounds (bounds-of-thing-at-point mouse-sel-selection-type)))
- (setq foo object-bounds)
(if object-bounds
(progn
(setq mark-active t)
@@
-334,7
+333,6
@@
This should be bound to a down-mouse event."
(t (goto-char (posn-point end)))
)
- (setq foo1 (cons (list min max (point)) foo1))
;; Determine direction of drag
(cond
((and (not direction) (not (eq min max)))